home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / tools / useful / archandler / s / whichlha < prev   
Encoding:
Text File  |  1994-07-06  |  146 b   |  10 lines
  1. Which >NIL: LhA
  2. If WARN
  3.   SetEnv lhapath ""
  4. Else
  5.   SetEnv lhapath `Which LhA`
  6.   If "$lhapath" EQ "RES LhA"
  7.     SetEnv lhapath "LhA"
  8.   EndIf
  9. EndIf
  10.